COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE				< Preliminary things
C00003 ENDMK
C⊗;
PRECEDE;				< Preliminary things
FUNC EXAMP.FUN[INS,MUS];		< Get functions from EXAMP.FUN[INS,MUS]
COMMON TOOT,CLAR;
*

REVRB 0 0 1;				< One "note" only
 P2 12;					< should be at least 2-3" longer than
END;					<   total of all instruments

TOOT 0 10;
P2 RHY/16;			< quarter note, 2 eighths, half
P3 NOT/GS4/A/B/C5;			< G4 = G above middle C
CON "*";
CON MOVE/8 1 .9;
P4 "1";					< maximum amplitude
P5 F1;					< amplitude function
P6 F6;					< waveform ("SYNTH") function
P7 .05;					< percentage (0 ↔ 1) of reverberation
END;